home *** CD-ROM | disk | FTP | other *** search
- /* FlippyFloppyWraps.c generated from FlippyFloppyWraps.psw
- by unix pswrap V1.009 Wed Apr 19 17:50:24 PDT 1989
- */
-
- #include <dpsclient/dpsfriends.h>
- #include <string.h>
-
- #line 1 "FlippyFloppyWraps.psw"
- /*
-
- FlippyFloppyWraps.psw
-
- Wraps for this funky thing.
-
- Copyright (c) 1992 by Scott Byer
-
- Permission is given to freely distribute and modify this code
- provided the copyright notice is left unchanged.
- No warranties, explicit or implied, apply to this code.
- */
-
- /* Zero out the cache limit for this context, return the old value. */
- #line 24 "FlippyFloppyWraps.c"
- void FFWzerocachelimit(int *cacheLimit)
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char topLevelCount;
- unsigned short nBytes;
-
- DPSBinObjGeneric obj0;
- DPSBinObjGeneric obj1;
- DPSBinObjGeneric obj2;
- DPSBinObjGeneric obj3;
- DPSBinObjGeneric obj4;
- DPSBinObjGeneric obj5;
- DPSBinObjGeneric obj6;
- DPSBinObjGeneric obj7;
- DPSBinObjGeneric obj8;
- DPSBinObjGeneric obj9;
- } _dpsQ;
- static const _dpsQ _dpsF = {
- DPS_DEF_TOKENTYPE, 10, 84,
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 265}, /* cachestatus */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 18}, /* clear */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 338}, /* setcachelimit */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_LITERAL|DPS_INT, 0, 0, 1},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 70}, /* flush */
- }; /* _dpsQ */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- char pad[3];
- DPSResultsRec _dpsR[1];
- static const DPSResultsRec _dpsRstat[] = {
- { dps_tInt, -1 },
- };
- _dpsR[0] = _dpsRstat[0];
- _dpsR[0].value = (char *)cacheLimit;
-
- DPSSetResultTable(_dpsCurCtxt, _dpsR, 1);
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,84);
- DPSAwaitReturnValues(_dpsCurCtxt);
- if (0) *pad = 0; /* quiets compiler warnings */
- }
- #line 18 "FlippyFloppyWraps.psw"
-
- #line 72 "FlippyFloppyWraps.c"
- void FFWsetcachelimit(int cacheLimit)
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char topLevelCount;
- unsigned short nBytes;
-
- DPSBinObjGeneric obj0;
- DPSBinObjGeneric obj1;
- } _dpsQ;
- static const _dpsQ _dpsStat = {
- DPS_DEF_TOKENTYPE, 2, 20,
- {DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: cacheLimit */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 338}, /* setcachelimit */
- }; /* _dpsQ */
- _dpsQ _dpsF; /* local copy */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- char pad[3];
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
- _dpsF = _dpsStat; /* assign automatic variable */
-
- _dpsP[0].val.integerVal = cacheLimit;
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,20);
- if (0) *pad = 0; /* quiets compiler warnings */
- }
- #line 22 "FlippyFloppyWraps.psw"
-
-
- /* Get the path bounding box for a line of text. */
- #line 102 "FlippyFloppyWraps.c"
- void FFWTextBBox(const char *someText, double *llx, double *lly, double *urx, double *ury)
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char sizeFlag;
- unsigned short topLevelCount;
- unsigned long nBytes;
-
- DPSBinObjGeneric obj0;
- DPSBinObjGeneric obj1;
- DPSBinObjGeneric obj2;
- DPSBinObjGeneric obj3;
- DPSBinObjGeneric obj4;
- DPSBinObjGeneric obj5;
- DPSBinObjGeneric obj6;
- DPSBinObjGeneric obj7;
- DPSBinObjGeneric obj8;
- DPSBinObjGeneric obj9;
- DPSBinObjGeneric obj10;
- DPSBinObjGeneric obj11;
- DPSBinObjGeneric obj12;
- DPSBinObjGeneric obj13;
- DPSBinObjGeneric obj14;
- DPSBinObjGeneric obj15;
- DPSBinObjGeneric obj16;
- DPSBinObjGeneric obj17;
- DPSBinObjGeneric obj18;
- DPSBinObjGeneric obj19;
- DPSBinObjGeneric obj20;
- } _dpsQ;
- static const _dpsQ _dpsStat = {
- DPS_DEF_TOKENTYPE, 0, 21, 176,
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 111}, /* newpath */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
- {DPS_LITERAL|DPS_STRING, 0, 0, 168}, /* param someText */
- {DPS_LITERAL|DPS_BOOL, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 17}, /* charpath */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 68}, /* flattenpath */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 115}, /* pathbbox */
- {DPS_LITERAL|DPS_INT, 0, 0, 3},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
- {DPS_LITERAL|DPS_INT, 0, 0, 2},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
- {DPS_LITERAL|DPS_INT, 0, 0, 1},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_LITERAL|DPS_INT, 0, 0, 4},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 70}, /* flush */
- }; /* _dpsQ */
- _dpsQ _dpsF; /* local copy */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- char pad[3];
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
- register int _dps_offset = 168;
- DPSResultsRec _dpsR[4];
- static const DPSResultsRec _dpsRstat[] = {
- { dps_tDouble, -1 },
- { dps_tDouble, -1 },
- { dps_tDouble, -1 },
- { dps_tDouble, -1 },
- };
- _dpsR[0] = _dpsRstat[0];
- _dpsR[0].value = (char *)llx;
- _dpsR[1] = _dpsRstat[1];
- _dpsR[1].value = (char *)lly;
- _dpsR[2] = _dpsRstat[2];
- _dpsR[2].value = (char *)urx;
- _dpsR[3] = _dpsRstat[3];
- _dpsR[3].value = (char *)ury;
-
- _dpsF = _dpsStat; /* assign automatic variable */
-
- _dpsP[4].length = strlen(someText);
- _dpsP[4].val.stringVal = _dps_offset;
- _dps_offset += (_dpsP[4].length + 3) & ~3;
-
- _dpsF.nBytes = _dps_offset+8;
- DPSSetResultTable(_dpsCurCtxt, _dpsR, 4);
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,176);
- DPSWriteStringChars(_dpsCurCtxt, (char *)someText, _dpsP[4].length);
- DPSWriteStringChars(_dpsCurCtxt, (char *)pad, ~(_dpsP[4].length + 3) & 3);
- DPSAwaitReturnValues(_dpsCurCtxt);
- if (0) *pad = 0; /* quiets compiler warnings */
- }
- #line 30 "FlippyFloppyWraps.psw"
-
-
- /* Transform the coordinate system */
- #line 196 "FlippyFloppyWraps.c"
- void FFWTransform(double tx, double ty, double sx, double sy, double r)
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char topLevelCount;
- unsigned short nBytes;
-
- DPSBinObjReal obj0;
- DPSBinObjReal obj1;
- DPSBinObjGeneric obj2;
- DPSBinObjReal obj3;
- DPSBinObjReal obj4;
- DPSBinObjGeneric obj5;
- DPSBinObjReal obj6;
- DPSBinObjGeneric obj7;
- } _dpsQ;
- static const _dpsQ _dpsStat = {
- DPS_DEF_TOKENTYPE, 8, 68,
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: tx */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: ty */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 173}, /* translate */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: sx */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: sy */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 139}, /* scale */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: r */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 136}, /* rotate */
- }; /* _dpsQ */
- _dpsQ _dpsF; /* local copy */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- char pad[3];
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
- _dpsF = _dpsStat; /* assign automatic variable */
-
- _dpsP[0].val.realVal = tx;
- _dpsP[1].val.realVal = ty;
- _dpsP[3].val.realVal = sx;
- _dpsP[4].val.realVal = sy;
- _dpsP[6].val.realVal = r;
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,68);
- if (0) *pad = 0; /* quiets compiler warnings */
- }
- #line 35 "FlippyFloppyWraps.psw"
-
-
- /* Reverse transform things, if given the right inputs. */
- #line 242 "FlippyFloppyWraps.c"
- void FFWDeTransform(double tx, double ty, double sx, double sy, double r)
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char topLevelCount;
- unsigned short nBytes;
-
- DPSBinObjReal obj0;
- DPSBinObjGeneric obj1;
- DPSBinObjReal obj2;
- DPSBinObjReal obj3;
- DPSBinObjGeneric obj4;
- DPSBinObjReal obj5;
- DPSBinObjReal obj6;
- DPSBinObjGeneric obj7;
- } _dpsQ;
- static const _dpsQ _dpsStat = {
- DPS_DEF_TOKENTYPE, 8, 68,
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: r */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 136}, /* rotate */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: sx */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: sy */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 139}, /* scale */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: tx */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: ty */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 173}, /* translate */
- }; /* _dpsQ */
- _dpsQ _dpsF; /* local copy */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- char pad[3];
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
- _dpsF = _dpsStat; /* assign automatic variable */
-
- _dpsP[5].val.realVal = tx;
- _dpsP[6].val.realVal = ty;
- _dpsP[2].val.realVal = sx;
- _dpsP[3].val.realVal = sy;
- _dpsP[0].val.realVal = r;
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,68);
- if (0) *pad = 0; /* quiets compiler warnings */
- }
- #line 40 "FlippyFloppyWraps.psw"
-
-
- /* Draw a single black rectangle. */
- #line 288 "FlippyFloppyWraps.c"
- void FFWBlackBox(double llx, double lly, double width, double height)
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char topLevelCount;
- unsigned short nBytes;
-
- DPSBinObjGeneric obj0;
- DPSBinObjGeneric obj1;
- DPSBinObjReal obj2;
- DPSBinObjReal obj3;
- DPSBinObjReal obj4;
- DPSBinObjReal obj5;
- DPSBinObjGeneric obj6;
- } _dpsQ;
- static const _dpsQ _dpsStat = {
- DPS_DEF_TOKENTYPE, 7, 60,
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150}, /* setgray */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: llx */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: lly */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: width */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: height */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 128}, /* rectfill */
- }; /* _dpsQ */
- _dpsQ _dpsF; /* local copy */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- char pad[3];
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
- _dpsF = _dpsStat; /* assign automatic variable */
-
- _dpsP[2].val.realVal = llx;
- _dpsP[3].val.realVal = lly;
- _dpsP[4].val.realVal = width;
- _dpsP[5].val.realVal = height;
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,60);
- if (0) *pad = 0; /* quiets compiler warnings */
- }
- #line 46 "FlippyFloppyWraps.psw"
-
-
- /* Draw text at a given location; the font must already be set. */
- #line 331 "FlippyFloppyWraps.c"
- void FFWText(double x, double y, const char *text)
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char sizeFlag;
- unsigned short topLevelCount;
- unsigned long nBytes;
-
- DPSBinObjReal obj0;
- DPSBinObjReal obj1;
- DPSBinObjGeneric obj2;
- DPSBinObjGeneric obj3;
- DPSBinObjGeneric obj4;
- } _dpsQ;
- static const _dpsQ _dpsStat = {
- DPS_DEF_TOKENTYPE, 0, 5, 48,
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: x */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: y */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
- {DPS_LITERAL|DPS_STRING, 0, 0, 40}, /* param text */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160}, /* show */
- }; /* _dpsQ */
- _dpsQ _dpsF; /* local copy */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- char pad[3];
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
- register int _dps_offset = 40;
- _dpsF = _dpsStat; /* assign automatic variable */
-
- _dpsP[0].val.realVal = x;
- _dpsP[1].val.realVal = y;
- _dpsP[3].length = strlen(text);
- _dpsP[3].val.stringVal = _dps_offset;
- _dps_offset += (_dpsP[3].length + 3) & ~3;
-
- _dpsF.nBytes = _dps_offset+8;
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,48);
- DPSWriteStringChars(_dpsCurCtxt, (char *)text, _dpsP[3].length);
- DPSWriteStringChars(_dpsCurCtxt, (char *)pad, ~(_dpsP[3].length + 3) & 3);
- if (0) *pad = 0; /* quiets compiler warnings */
- }
- #line 51 "FlippyFloppyWraps.psw"
-